/ Apple Service Source 1996 February / Service Source 2.0 1996 Companion.iso / Apple SW Updates / Macintosh / Utilities / AMK Spinning Cursor Bug Fix.sea / CURSOR.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 08 43 55 52 53 4f 52 | 2e 63 00 00 00 00 00 00 |..CURSOR|.c......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 0c a7 00 | 00 02 48 ab ea 51 9a ab |........|..H..Q..|
|00000060| ea 51 9a 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.Q......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 5a fb 00 00 |........|....Z...|
|00000080| 2f 2a 0d 20 20 20 46 69 | 6c 65 3a 20 43 55 52 53 |/*.   Fi|le: CURS|
|00000090| 4f 52 2e 63 0d 20 20 20 | 46 6f 6c 64 65 72 3a 20 |OR.c.   |Folder: |
|000000a0| 52 55 4e 54 49 4d 45 0d | 20 20 20 28 63 29 20 45 |RUNTIME.|   (c) E|
|000000b0| 6e 63 6f 72 65 20 44 8e | 76 65 6c 6f 70 70 65 6d |ncore D.|veloppem|
|000000c0| 65 6e 74 2c 20 53 41 52 | 4c 2c 20 31 39 39 32 2d |ent, SAR|L, 1992-|
|000000d0| 39 34 0d 2a 2f 0d 0d 23 | 69 6e 63 6c 75 64 65 20 |94.*/..#|include |
|000000e0| 22 4d 65 6d 6f 72 79 2e | 68 22 0d 23 69 6e 63 6c |"Memory.|h".#incl|
|000000f0| 75 64 65 20 22 51 75 69 | 63 6b 44 72 61 77 2e 68 |ude "Qui|ckDraw.h|
|00000100| 22 0d 23 69 6e 63 6c 75 | 64 65 20 22 52 65 74 72 |".#inclu|de "Retr|
|00000110| 61 63 65 2e 68 22 0d 0d | 23 69 6e 63 6c 75 64 65 |ace.h"..|#include|
|00000120| 20 22 4b 65 79 2e 68 22 | 0d 0d 65 78 74 65 72 6e | "Key.h"|..extern|
|00000130| 20 63 6f 6e 73 74 20 6b | 65 79 49 44 20 4b 5f 44 | const k|eyID K_D|
|00000140| 41 54 41 3b 0d 65 78 74 | 65 72 6e 20 63 6f 6e 73 |ATA;.ext|ern cons|
|00000150| 74 20 6b 65 79 49 44 20 | 4b 5f 49 44 3b 0d 0d 65 |t keyID |K_ID;..e|
|00000160| 78 74 65 72 6e 20 63 6f | 6e 73 74 20 6b 65 79 49 |xtern co|nst keyI|
|00000170| 44 20 4b 5f 43 4f 55 4e | 54 3b 0d 65 78 74 65 72 |D K_COUN|T;.exter|
|00000180| 6e 20 63 6f 6e 73 74 20 | 6b 65 79 49 44 20 4b 5f |n const |keyID K_|
|00000190| 47 45 54 41 54 3b 0d 0d | 76 6f 69 64 20 43 75 72 |GETAT;..|void Cur|
|000001a0| 73 6f 72 4c 6f 61 64 28 | 6b 65 79 2a 20 74 68 65 |sorLoad(|key* the|
|000001b0| 29 0d 7b 0d 09 73 68 6f | 72 74 20 61 6e 49 44 3b |).{..sho|rt anID;|
|000001c0| 0d 09 43 43 72 73 72 48 | 61 6e 64 6c 65 20 61 43 |..CCrsrH|andle aC|
|000001d0| 43 72 73 72 48 61 6e 64 | 6c 65 3b 0d 09 0d 09 61 |CrsrHand|le;....a|
|000001e0| 6e 49 44 20 3d 20 6b 65 | 79 54 6f 49 6e 74 65 67 |nID = ke|yToInteg|
|000001f0| 65 72 28 6b 65 79 47 65 | 74 28 74 68 65 5b 53 45 |er(keyGe|t(the[SE|
|00000200| 4c 46 5d 2c 20 4b 5f 49 | 44 29 29 3b 0d 09 61 43 |LF], K_I|D));..aC|
|00000210| 43 72 73 72 48 61 6e 64 | 6c 65 20 3d 20 47 65 74 |CrsrHand|le = Get|
|00000220| 43 43 75 72 73 6f 72 28 | 61 6e 49 44 29 3b 0d 09 |CCursor(|anID);..|
|00000230| 6b 65 79 49 66 4e 55 4c | 4c 28 61 43 43 72 73 72 |keyIfNUL|L(aCCrsr|
|00000240| 48 61 6e 64 6c 65 29 3b | 0d 09 6b 65 79 50 75 74 |Handle);|..keyPut|
|00000250| 28 74 68 65 5b 53 45 4c | 46 5d 2c 20 4b 5f 44 41 |(the[SEL|F], K_DA|
|00000260| 54 41 2c 20 6b 65 79 46 | 72 6f 6d 48 61 6e 64 6c |TA, keyF|romHandl|
|00000270| 65 28 61 43 43 72 73 72 | 48 61 6e 64 6c 65 29 29 |e(aCCrsr|Handle))|
|00000280| 3b 0d 7d 0d 0d 76 6f 69 | 64 20 43 75 72 73 6f 72 |;.}..voi|d Cursor|
|00000290| 53 65 74 28 6b 65 79 2a | 20 74 68 65 29 0d 7b 0d |Set(key*| the).{.|
|000002a0| 09 43 43 72 73 72 48 61 | 6e 64 6c 65 20 61 43 43 |.CCrsrHa|ndle aCC|
|000002b0| 72 73 72 48 61 6e 64 6c | 65 3b 0d 09 0d 09 61 43 |rsrHandl|e;....aC|
|000002c0| 43 72 73 72 48 61 6e 64 | 6c 65 20 3d 20 28 43 43 |CrsrHand|le = (CC|
|000002d0| 72 73 72 48 61 6e 64 6c | 65 29 6b 65 79 54 6f 48 |rsrHandl|e)keyToH|
|000002e0| 61 6e 64 6c 65 28 6b 65 | 79 47 65 74 28 74 68 65 |andle(ke|yGet(the|
|000002f0| 5b 53 45 4c 46 5d 2c 20 | 4b 5f 44 41 54 41 29 29 |[SELF], |K_DATA))|
|00000300| 3b 0d 09 6b 65 79 43 68 | 65 63 6b 28 61 43 43 72 |;..keyCh|eck(aCCr|
|00000310| 73 72 48 61 6e 64 6c 65 | 20 21 3d 20 4e 55 4c 4c |srHandle| != NULL|
|00000320| 29 3b 0d 09 53 65 74 43 | 43 75 72 73 6f 72 28 61 |);..SetC|Cursor(a|
|00000330| 43 43 72 73 72 48 61 6e | 64 6c 65 29 3b 0d 7d 0d |CCrsrHan|dle);.}.|
|00000340| 0d 76 6f 69 64 20 43 75 | 72 73 6f 72 55 6e 6c 6f |.void Cu|rsorUnlo|
|00000350| 61 64 28 6b 65 79 2a 20 | 74 68 65 29 0d 7b 0d 09 |ad(key* |the).{..|
|00000360| 43 43 72 73 72 48 61 6e | 64 6c 65 20 61 43 43 72 |CCrsrHan|dle aCCr|
|00000370| 73 72 48 61 6e 64 6c 65 | 3b 0d 09 0d 09 61 43 43 |srHandle|;....aCC|
|00000380| 72 73 72 48 61 6e 64 6c | 65 20 3d 20 28 43 43 72 |rsrHandl|e = (CCr|
|00000390| 73 72 48 61 6e 64 6c 65 | 29 6b 65 79 54 6f 48 61 |srHandle|)keyToHa|
|000003a0| 6e 64 6c 65 28 6b 65 79 | 47 65 74 28 74 68 65 5b |ndle(key|Get(the[|
|000003b0| 53 45 4c 46 5d 2c 20 4b | 5f 44 41 54 41 29 29 3b |SELF], K|_DATA));|
|000003c0| 0d 09 6b 65 79 43 68 65 | 63 6b 28 61 43 43 72 73 |..keyChe|ck(aCCrs|
|000003d0| 72 48 61 6e 64 6c 65 20 | 21 3d 20 4e 55 4c 4c 29 |rHandle |!= NULL)|
|000003e0| 3b 0d 09 44 69 73 70 6f | 73 43 43 75 72 73 6f 72 |;..Dispo|sCCursor|
|000003f0| 28 61 43 43 72 73 72 48 | 61 6e 64 6c 65 29 3b 0d |(aCCrsrH|andle);.|
|00000400| 09 6b 65 79 50 75 74 28 | 74 68 65 5b 53 45 4c 46 |.keyPut(|the[SELF|
|00000410| 5d 2c 20 4b 5f 44 41 54 | 41 2c 20 6b 65 79 56 6f |], K_DAT|A, keyVo|
|00000420| 69 64 29 3b 0d 7d 0d 0d | 74 79 70 65 64 65 66 20 |id);.}..|typedef |
|00000430| 73 74 72 75 63 74 20 7b | 0d 23 69 66 64 65 66 20 |struct {|.#ifdef |
|00000440| 61 70 70 6c 65 63 0d 09 | 6c 6f 6e 67 20 67 6c 6f |applec..|long glo|
|00000450| 62 61 6c 41 35 3b 0d 09 | 6c 6f 6e 67 20 6c 6f 63 |balA5;..|long loc|
|00000460| 61 6c 41 35 3b 0d 23 65 | 6e 64 69 66 0d 09 56 42 |alA5;.#e|ndif..VB|
|00000470| 4c 54 61 73 6b 20 74 61 | 73 6b 3b 0d 09 73 68 6f |LTask ta|sk;..sho|
|00000480| 72 74 20 72 75 6e 6e 69 | 6e 67 3b 0d 09 73 68 6f |rt runni|ng;..sho|
|00000490| 72 74 20 69 6e 64 65 78 | 3b 0d 09 73 68 6f 72 74 |rt index|;..short|
|000004a0| 20 63 6f 75 6e 74 3b 0d | 09 43 43 72 73 72 50 74 | count;.|.CCrsrPt|
|000004b0| 72 20 63 75 72 73 6f 72 | 73 5b 36 34 5d 3b 0d 7d |r cursor|s[64];.}|
|000004c0| 20 53 70 69 6e 52 65 63 | 6f 72 64 2c 20 2a 53 70 | SpinRec|ord, *Sp|
|000004d0| 69 6e 50 74 72 3b 0d 0d | 53 70 69 6e 52 65 63 6f |inPtr;..|SpinReco|
|000004e0| 72 64 20 67 53 70 69 6e | 52 65 63 6f 72 64 3b 0d |rd gSpin|Record;.|
|000004f0| 0d 23 69 66 64 65 66 20 | 61 70 70 6c 65 63 0d 70 |.#ifdef |applec.p|
|00000500| 61 73 63 61 6c 20 6c 6f | 6e 67 20 47 65 74 41 30 |ascal lo|ng GetA0|
|00000510| 28 29 20 3d 20 7b 20 30 | 78 32 65 38 38 20 7d 3b |() = { 0|x2e88 };|
|00000520| 0d 70 61 73 63 61 6c 20 | 6c 6f 6e 67 20 47 65 74 |.pascal |long Get|
|00000530| 41 35 28 29 20 3d 20 7b | 20 30 78 32 65 38 64 20 |A5() = {| 0x2e8d |
|00000540| 7d 3b 0d 23 65 6e 64 69 | 66 0d 0d 70 61 73 63 61 |};.#endi|f..pasca|
|00000550| 6c 20 76 6f 69 64 20 53 | 70 69 6e 56 42 4c 54 61 |l void S|pinVBLTa|
|00000560| 73 6b 28 29 0d 7b 0d 23 | 69 66 64 65 66 20 61 70 |sk().{.#|ifdef ap|
|00000570| 70 6c 65 63 0d 09 53 70 | 69 6e 50 74 72 20 61 53 |plec..Sp|inPtr aS|
|00000580| 70 69 6e 50 74 72 20 3d | 20 28 53 70 69 6e 50 74 |pinPtr =| (SpinPt|
|00000590| 72 29 28 47 65 74 41 30 | 28 29 20 2d 20 28 73 69 |r)(GetA0|() - (si|
|000005a0| 7a 65 6f 66 28 6c 6f 6e | 67 29 20 2a 20 32 29 29 |zeof(lon|g) * 2))|
|000005b0| 3b 0d 09 61 53 70 69 6e | 50 74 72 2d 3e 6c 6f 63 |;..aSpin|Ptr->loc|
|000005c0| 61 6c 41 35 20 3d 20 53 | 65 74 41 35 28 61 53 70 |alA5 = S|etA5(aSp|
|000005d0| 69 6e 50 74 72 2d 3e 67 | 6c 6f 62 61 6c 41 35 29 |inPtr->g|lobalA5)|
|000005e0| 3b 0d 23 65 6e 64 69 66 | 0d 23 69 66 64 65 66 20 |;.#endif|.#ifdef |
|000005f0| 70 6f 77 65 72 63 0d 09 | 53 70 69 6e 50 74 72 20 |powerc..|SpinPtr |
|00000600| 61 53 70 69 6e 50 74 72 | 20 3d 20 26 67 53 70 69 |aSpinPtr| = &gSpi|
|00000610| 6e 52 65 63 6f 72 64 3b | 0d 23 65 6e 64 69 66 0d |nRecord;|.#endif.|
|00000620| 09 61 53 70 69 6e 50 74 | 72 2d 3e 74 61 73 6b 2e |.aSpinPt|r->task.|
|00000630| 76 62 6c 43 6f 75 6e 74 | 20 3d 20 31 30 3b 0d 09 |vblCount| = 10;..|
|00000640| 61 53 70 69 6e 50 74 72 | 2d 3e 69 6e 64 65 78 2b |aSpinPtr|->index+|
|00000650| 2b 3b 0d 09 69 66 20 28 | 61 53 70 69 6e 50 74 72 |+;..if (|aSpinPtr|
|00000660| 2d 3e 69 6e 64 65 78 20 | 3d 3d 20 61 53 70 69 6e |->index |== aSpin|
|00000670| 50 74 72 2d 3e 63 6f 75 | 6e 74 29 20 7b 0d 09 09 |Ptr->cou|nt) {...|
|00000680| 61 53 70 69 6e 50 74 72 | 2d 3e 69 6e 64 65 78 20 |aSpinPtr|->index |
|00000690| 3d 20 30 3b 0d 09 7d 0d | 09 0d 09 2f 2a 20 09 0d |= 0;..}.|.../* ..|
|000006a0| 09 55 73 65 20 74 68 65 | 20 62 26 77 20 63 75 72 |.Use the| b&w cur|
|000006b0| 73 6f 72 20 69 6e 73 69 | 64 65 20 74 68 65 20 6c |sor insi|de the l|
|000006c0| 6f 63 6b 65 64 20 63 6f | 6c 6f 72 20 63 75 72 73 |ocked co|lor curs|
|000006d0| 6f 72 20 68 61 6e 64 6c | 65 0d 09 73 6f 20 69 74 |or handl|e..so it|
|000006e0| 20 64 6f 65 73 20 6e 6f | 74 20 6d 6f 76 65 20 6d | does no|t move m|
|000006f0| 65 6d 6f 72 79 2e 2e 2e | 0d 09 2a 2f 0d 09 0d 09 |emory...|..*/....|
|00000700| 53 65 74 43 75 72 73 6f | 72 28 28 43 75 72 73 6f |SetCurso|r((Curso|
|00000710| 72 2a 29 26 28 28 61 53 | 70 69 6e 50 74 72 2d 3e |r*)&((aS|pinPtr->|
|00000720| 63 75 72 73 6f 72 73 5b | 61 53 70 69 6e 50 74 72 |cursors[|aSpinPtr|
|00000730| 2d 3e 69 6e 64 65 78 5d | 29 2d 3e 63 72 73 72 31 |->index]|)->crsr1|
|00000740| 44 61 74 61 29 29 3b 0d | 23 69 66 64 65 66 20 61 |Data));.|#ifdef a|
|00000750| 70 70 6c 65 63 0d 09 53 | 65 74 41 35 28 61 53 70 |pplec..S|etA5(aSp|
|00000760| 69 6e 50 74 72 2d 3e 6c | 6f 63 61 6c 41 35 29 3b |inPtr->l|ocalA5);|
|00000770| 0d 23 65 6e 64 69 66 0d | 7d 0d 0d 76 6f 69 64 20 |.#endif.|}..void |
|00000780| 53 70 69 6e 49 73 52 75 | 6e 6e 69 6e 67 28 6b 65 |SpinIsRu|nning(ke|
|00000790| 79 2a 20 74 68 65 29 0d | 7b 0d 09 74 68 65 5b 52 |y* the).|{..the[R|
|000007a0| 45 53 55 4c 54 5d 20 3d | 20 6b 65 79 46 72 6f 6d |ESULT] =| keyFrom|
|000007b0| 42 6f 6f 6c 65 61 6e 28 | 67 53 70 69 6e 52 65 63 |Boolean(|gSpinRec|
|000007c0| 6f 72 64 2e 72 75 6e 6e | 69 6e 67 29 3b 0d 7d 0d |ord.runn|ing);.}.|
|000007d0| 0d 76 6f 69 64 20 53 70 | 69 6e 53 74 61 72 74 28 |.void Sp|inStart(|
|000007e0| 6b 65 79 2a 20 74 68 65 | 29 0d 7b 0d 09 73 74 61 |key* the|).{..sta|
|000007f0| 74 69 63 20 56 42 4c 55 | 50 50 20 61 56 42 4c 55 |tic VBLU|PP aVBLU|
|00000800| 50 50 20 3d 20 4e 55 4c | 4c 3b 0d 0d 09 73 68 6f |PP = NUL|L;...sho|
|00000810| 72 74 20 61 43 6f 75 6e | 74 2c 20 61 6e 49 6e 64 |rt aCoun|t, anInd|
|00000820| 65 78 3b 0d 09 48 61 6e | 64 6c 65 20 61 48 61 6e |ex;..Han|dle aHan|
|00000830| 64 6c 65 3b 0d 09 0d 09 | 69 66 20 28 61 56 42 4c |dle;....|if (aVBL|
|00000840| 55 50 50 20 3d 3d 20 4e | 55 4c 4c 29 20 7b 0d 09 |UPP == N|ULL) {..|
|00000850| 09 61 56 42 4c 55 50 50 | 20 3d 20 4e 65 77 56 42 |.aVBLUPP| = NewVB|
|00000860| 4c 50 72 6f 63 28 53 70 | 69 6e 56 42 4c 54 61 73 |LProc(Sp|inVBLTas|
|00000870| 6b 29 3b 0d 09 7d 0d 09 | 0d 09 61 43 6f 75 6e 74 |k);..}..|..aCount|
|00000880| 20 3d 20 6b 65 79 54 6f | 49 6e 74 65 67 65 72 28 | = keyTo|Integer(|
|00000890| 6b 65 79 43 61 6c 6c 30 | 28 74 68 65 5b 53 45 4c |keyCall0|(the[SEL|
|000008a0| 46 5d 2c 20 4b 5f 43 4f | 55 4e 54 29 29 3b 0d 09 |F], K_CO|UNT));..|
|000008b0| 66 6f 72 20 28 61 6e 49 | 6e 64 65 78 20 3d 20 30 |for (anI|ndex = 0|
|000008c0| 3b 20 61 6e 49 6e 64 65 | 78 20 3c 20 61 43 6f 75 |; anInde|x < aCou|
|000008d0| 6e 74 3b 20 61 6e 49 6e | 64 65 78 2b 2b 29 20 7b |nt; anIn|dex++) {|
|000008e0| 0d 09 09 74 68 65 5b 52 | 45 53 55 4c 54 5d 20 3d |...the[R|ESULT] =|
|000008f0| 20 6b 65 79 43 61 6c 6c | 31 28 74 68 65 5b 53 45 | keyCall|1(the[SE|
|00000900| 4c 46 5d 2c 20 4b 5f 47 | 45 54 41 54 2c 20 6b 65 |LF], K_G|ETAT, ke|
|00000910| 79 46 72 6f 6d 49 6e 74 | 65 67 65 72 28 61 6e 49 |yFromInt|eger(anI|
|00000920| 6e 64 65 78 20 2b 20 31 | 29 29 3b 0d 09 09 61 48 |ndex + 1|));...aH|
|00000930| 61 6e 64 6c 65 20 3d 20 | 6b 65 79 54 6f 48 61 6e |andle = |keyToHan|
|00000940| 64 6c 65 28 6b 65 79 47 | 65 74 28 74 68 65 5b 52 |dle(keyG|et(the[R|
|00000950| 45 53 55 4c 54 5d 2c 20 | 4b 5f 44 41 54 41 29 29 |ESULT], |K_DATA))|
|00000960| 3b 0d 09 09 48 4c 6f 63 | 6b 28 61 48 61 6e 64 6c |;...HLoc|k(aHandl|
|00000970| 65 29 3b 0d 09 09 67 53 | 70 69 6e 52 65 63 6f 72 |e);...gS|pinRecor|
|00000980| 64 2e 63 75 72 73 6f 72 | 73 5b 61 6e 49 6e 64 65 |d.cursor|s[anInde|
|00000990| 78 5d 20 3d 20 28 43 43 | 72 73 72 50 74 72 29 2a |x] = (CC|rsrPtr)*|
|000009a0| 61 48 61 6e 64 6c 65 3b | 0d 09 7d 0d 09 0d 23 69 |aHandle;|..}...#i|
|000009b0| 66 64 65 66 20 61 70 70 | 6c 65 63 0d 09 67 53 70 |fdef app|lec..gSp|
|000009c0| 69 6e 52 65 63 6f 72 64 | 2e 67 6c 6f 62 61 6c 41 |inRecord|.globalA|
|000009d0| 35 20 3d 20 47 65 74 41 | 35 28 29 3b 0d 23 65 6e |5 = GetA|5();.#en|
|000009e0| 64 69 66 0d 09 67 53 70 | 69 6e 52 65 63 6f 72 64 |dif..gSp|inRecord|
|000009f0| 2e 74 61 73 6b 2e 71 54 | 79 70 65 20 3d 20 76 54 |.task.qT|ype = vT|
|00000a00| 79 70 65 3b 0d 09 67 53 | 70 69 6e 52 65 63 6f 72 |ype;..gS|pinRecor|
|00000a10| 64 2e 74 61 73 6b 2e 76 | 62 6c 41 64 64 72 20 3d |d.task.v|blAddr =|
|00000a20| 20 61 56 42 4c 55 50 50 | 3b 0d 09 67 53 70 69 6e | aVBLUPP|;..gSpin|
|00000a30| 52 65 63 6f 72 64 2e 74 | 61 73 6b 2e 76 62 6c 43 |Record.t|ask.vblC|
|00000a40| 6f 75 6e 74 20 3d 20 31 | 30 3b 0d 09 67 53 70 69 |ount = 1|0;..gSpi|
|00000a50| 6e 52 65 63 6f 72 64 2e | 74 61 73 6b 2e 76 62 6c |nRecord.|task.vbl|
|00000a60| 50 68 61 73 65 20 3d 20 | 30 3b 0d 09 67 53 70 69 |Phase = |0;..gSpi|
|00000a70| 6e 52 65 63 6f 72 64 2e | 69 6e 64 65 78 20 3d 20 |nRecord.|index = |
|00000a80| 30 3b 0d 09 67 53 70 69 | 6e 52 65 63 6f 72 64 2e |0;..gSpi|nRecord.|
|00000a90| 63 6f 75 6e 74 20 3d 20 | 61 43 6f 75 6e 74 3b 0d |count = |aCount;.|
|00000aa0| 09 69 66 20 28 56 49 6e | 73 74 61 6c 6c 28 28 51 |.if (VIn|stall((Q|
|00000ab0| 45 6c 65 6d 50 74 72 29 | 26 28 67 53 70 69 6e 52 |ElemPtr)|&(gSpinR|
|00000ac0| 65 63 6f 72 64 2e 74 61 | 73 6b 29 29 20 3d 3d 20 |ecord.ta|sk)) == |
|00000ad0| 6e 6f 45 72 72 29 20 7b | 0d 09 09 67 53 70 69 6e |noErr) {|...gSpin|
|00000ae0| 52 65 63 6f 72 64 2e 72 | 75 6e 6e 69 6e 67 20 3d |Record.r|unning =|
|00000af0| 20 31 3b 0d 09 7d 0d 7d | 0d 0d 76 6f 69 64 20 53 | 1;..}.}|..void S|
|00000b00| 70 69 6e 53 74 6f 70 28 | 6b 65 79 2a 20 74 68 65 |pinStop(|key* the|
|00000b10| 29 0d 7b 0d 09 73 68 6f | 72 74 20 61 43 6f 75 6e |).{..sho|rt aCoun|
|00000b20| 74 2c 20 61 6e 49 6e 64 | 65 78 3b 0d 09 48 61 6e |t, anInd|ex;..Han|
|00000b30| 64 6c 65 20 61 48 61 6e | 64 6c 65 3b 0d 0d 09 69 |dle aHan|dle;...i|
|00000b40| 66 20 28 56 52 65 6d 6f | 76 65 28 28 51 45 6c 65 |f (VRemo|ve((QEle|
|00000b50| 6d 50 74 72 29 26 28 67 | 53 70 69 6e 52 65 63 6f |mPtr)&(g|SpinReco|
|00000b60| 72 64 2e 74 61 73 6b 29 | 29 20 3d 3d 20 6e 6f 45 |rd.task)|) == noE|
|00000b70| 72 72 29 20 7b 0d 09 09 | 67 53 70 69 6e 52 65 63 |rr) {...|gSpinRec|
|00000b80| 6f 72 64 2e 72 75 6e 6e | 69 6e 67 20 3d 20 30 3b |ord.runn|ing = 0;|
|00000b90| 0d 09 7d 0d 09 61 43 6f | 75 6e 74 20 3d 20 6b 65 |..}..aCo|unt = ke|
|00000ba0| 79 54 6f 49 6e 74 65 67 | 65 72 28 6b 65 79 43 61 |yToInteg|er(keyCa|
|00000bb0| 6c 6c 30 28 74 68 65 5b | 53 45 4c 46 5d 2c 20 4b |ll0(the[|SELF], K|
|00000bc0| 5f 43 4f 55 4e 54 29 29 | 3b 0d 09 66 6f 72 20 28 |_COUNT))|;..for (|
|00000bd0| 61 6e 49 6e 64 65 78 20 | 3d 20 30 3b 20 61 6e 49 |anIndex |= 0; anI|
|00000be0| 6e 64 65 78 20 3c 20 61 | 43 6f 75 6e 74 3b 20 61 |ndex < a|Count; a|
|00000bf0| 6e 49 6e 64 65 78 2b 2b | 29 20 7b 0d 09 09 74 68 |nIndex++|) {...th|
|00000c00| 65 5b 52 45 53 55 4c 54 | 5d 20 3d 20 6b 65 79 43 |e[RESULT|] = keyC|
|00000c10| 61 6c 6c 31 28 74 68 65 | 5b 53 45 4c 46 5d 2c 20 |all1(the|[SELF], |
|00000c20| 4b 5f 47 45 54 41 54 2c | 20 6b 65 79 46 72 6f 6d |K_GETAT,| keyFrom|
|00000c30| 49 6e 74 65 67 65 72 28 | 61 6e 49 6e 64 65 78 20 |Integer(|anIndex |
|00000c40| 2b 20 31 29 29 3b 0d 09 | 09 61 48 61 6e 64 6c 65 |+ 1));..|.aHandle|
|00000c50| 20 3d 20 6b 65 79 54 6f | 48 61 6e 64 6c 65 28 6b | = keyTo|Handle(k|
|00000c60| 65 79 47 65 74 28 74 68 | 65 5b 52 45 53 55 4c 54 |eyGet(th|e[RESULT|
|00000c70| 5d 2c 20 4b 5f 44 41 54 | 41 29 29 3b 0d 09 09 48 |], K_DAT|A));...H|
|00000c80| 55 6e 6c 6f 63 6b 28 61 | 48 61 6e 64 6c 65 29 3b |Unlock(a|Handle);|
|00000c90| 0d 09 09 67 53 70 69 6e | 52 65 63 6f 72 64 2e 63 |...gSpin|Record.c|
|00000ca0| 75 72 73 6f 72 73 5b 61 | 6e 49 6e 64 65 78 5d 20 |ursors[a|nIndex] |
|00000cb0| 3d 20 4e 55 4c 4c 3b 0d | 09 7d 0d 7d 0d 0d 76 6f |= NULL;.|.}.}..vo|
|00000cc0| 69 64 20 43 75 72 73 6f | 72 73 53 68 6f 77 28 6b |id Curso|rsShow(k|
|00000cd0| 65 79 20 2a 74 68 65 29 | 0d 7b 0d 09 69 66 20 28 |ey *the)|.{..if (|
|00000ce0| 6b 65 79 49 73 54 72 75 | 65 28 74 68 65 5b 41 52 |keyIsTru|e(the[AR|
|00000cf0| 47 55 4d 45 4e 54 28 31 | 29 5d 29 29 20 0d 09 09 |GUMENT(1|)])) ...|
|00000d00| 53 68 6f 77 43 75 72 73 | 6f 72 28 29 3b 0d 09 65 |ShowCurs|or();..e|
|00000d10| 6c 73 65 20 0d 09 09 48 | 69 64 65 43 75 72 73 6f |lse ...H|ideCurso|
|00000d20| 72 28 29 3b 0d 7d 0d 00 | 00 00 00 00 00 00 00 00 |r();.}..|........|
|00000d30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000d80| 00 00 01 00 00 00 01 fe | 00 00 00 fe 00 00 00 4a |........|.......J|
|00000d90| 2f 2d af d6 4e ad 0e f2 | 2d 5f ff fa 20 6e ff fa |/-..N...|-_.. n..|
|00000da0| 20 50 2d 68 00 18 ff f6 | 2f 2d af d6 42 67 4e ad | P-h....|/-..BgN.|
|00000db0| 08 43 55 52 53 4f 52 2e | 63 52 02 00 00 00 54 45 |.CURSOR.|cR....TE|
|00000dc0| 58 54 4d 50 53 20 00 00 | 00 00 00 00 00 00 00 00 |XTMPS ..|........|
|00000dd0| 00 00 54 45 58 54 4d 50 | 53 20 00 00 00 00 00 00 |..TEXTMP|S ......|
|00000de0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000df0| 00 00 ac b2 c4 1c 00 00 | 0c a7 00 00 02 48 2f 2d |........|.....H/-|
|00000e00| af ec 2f 2d af d6 4e ad | 14 e2 2f 2d b6 26 3f 2d |../-..N.|../-.&?-|
|00000e10| c6 4c 4e ad 12 f2 42 67 | 2f 2d b6 26 3f 2d c6 4c |.LN...Bg|/-.&?-.L|
|00000e20| 4e ad 28 62 10 1f 66 04 | 4e ad 1f 02 48 6d bf 9a |N.(b..f.|N...Hm..|
|00000e30| 4e ad 2e 32 60 46 10 2d | b5 e4 67 36 20 6d b9 28 |N..2`F.-|..g6 m.(|
|00000e40| 20 50 22 6d b9 28 22 51 | 30 28 00 20 b0 69 00 22 | P"m.("Q|0(. .i."|
|00000e50| 67 0a 1f 3c 00 02 4e ad | 0f ea 60 20 48 6d b4 b2 |g..<..N.|..` Hm..|
|00000e60| 42 a7 2f 2d b9 28 a9 cf | 4e ad 25 8a 4e ad 10 6a |B./-.(..|N.%.N..j|
|00000e70| 60 0a 42 67 4e ad 10 4a | 1d 5f ff ff 4e ad 0d fa |`.BgN..J|._..N...|
|00000e80| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 22 0d 23 |...H..Mo|naco.".#|
|00000e90| 00 7b 68 90 75 64 65 20 | 22 4d 65 6d 6f 72 79 2e |.{h.ude |"Memory.|
|00000ea0| 68 22 0d 23 69 6e 00 06 | 00 02 00 64 00 1c 02 6d |h".#in..|...d...m|
|00000eb0| 02 fd 00 64 00 1c 02 6d | 02 fd ab ea 19 5a 00 00 |...d...m|.....Z..|
|00000ec0| 06 7c 00 00 06 7c 00 00 | 07 6c 01 00 00 00 00 8c |.|...|..|.l......|
|00000ed0| 00 07 00 00 01 1d 00 00 | 01 27 0b 43 75 72 73 6f |........|.'.Curso|
|00000ee0| 72 4c 6f 61 64 00 00 00 | 02 0a 00 00 02 13 09 43 |rLoad...|.......C|
|00000ef0| 75 72 73 6f 72 53 65 74 | 00 00 02 c6 00 00 02 d2 |ursorSet|........|
|00000f00| 0d 43 75 72 73 6f 72 55 | 6e 6c 6f 61 64 00 00 00 |.CursorU|nload...|
|00000f10| 04 d7 00 00 04 e2 0b 53 | 70 69 6e 56 42 4c 54 61 |.......S|pinVBLTa|
|00000f20| 73 6b 00 00 07 00 00 00 | 07 0d 0d 53 70 69 6e 49 |sk......|...SpinI|
|00000f30| 73 52 75 6e 6e 69 6e 67 | 00 00 07 56 00 00 07 5f |sRunning|...V..._|
|00000f40| 09 53 70 69 6e 53 74 61 | 72 74 00 00 0a 7f 00 00 |.SpinSta|rt......|
|00000f50| 0a 87 09 53 70 69 6e 53 | 74 6f 70 00 00 00 00 1e |...SpinS|top.....|
|00000f60| 00 64 00 1c 02 6d 02 fd | 00 64 00 1c 02 6d 02 fd |.d...m..|.d...m..|
|00000f70| 00 00 07 6c 00 00 00 00 | 00 00 00 00 00 00 00 00 |...l....|........|
|00000f80| 01 00 00 00 01 fe 00 00 | 00 fe 00 00 00 4a 00 89 |........|.....J..|
|00000f90| 21 08 1f 96 00 00 00 1c | 00 4a 00 00 4d 50 53 52 |!.......|.J..MPSR|
|00000fa0| 00 02 00 0a 03 ed ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000fb0| 03 ef ff ff 00 00 00 4c | 00 00 00 00 03 f0 ff ff |.......L|........|
|00000fc0| 00 00 00 dc 00 8b 7b f4 | 00 00 00 00 00 00 00 00 |......{.|........|
|00000fd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000fe0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000ff0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+